home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Software Contest 3 / FM Towns Software Contest 3.iso / exp / bpp / no1 / test.p1 < prev    next >
Text File  |  1994-01-07  |  303b  |  21 lines
  1. ' [ BPP PASS 1 ]
  2. I=0 '#1
  3. WHILE I<20 '#2
  4. PRINT I '#3
  5. I=I+1 '#4
  6. IF I=10 THEN BREAK '#5
  7. WEND '#6
  8. FOR I=0 TO 20 '#7
  9. PRINT I '#8
  10. IF I=10 THEN BREAK '#9
  11. NEXT '#10
  12. DO '#11
  13. PRINT I '#12
  14. I=I-1 '#13
  15. LOOP I>0 '#14
  16. FOR I=0,I<20,I=I+1 '#15
  17. PRINT I '#16
  18. IF I=10 THEN BREAK '#17
  19. NEXT '#18
  20. END '#19
  21.